clear;

pexpDays=[...
        20000120; 20000217; 20000316; 20000419; 20000518; 20000615; 20000720; 20000817; 20000914; 20001019; 20001116; 20001214; ...
        20010118; 20010215; 20010315; 20010419; 20010517; 20010614; 20010719; 20010816; 20010920; 20011018; 20011115; 20011220; ...
        20020117; 20020214; 20020314; 20020418; 20020516; 20020620; 20020718; 20020815; 20020919; 20021017; 20021114; 20021219; ...
        20030116; 20030220; 20030320; 20030416; 20030515; 20030619; 20030717; 20030814; 20030918; 20031016; 20031120; 20031218; ...
        20040115; 20040219; 20040318; 20040415; 20040520; 20040617; 20040715; 20040819; 20040916; 20041014; 20041118; 20041216; ...
        20050120; 20050217; 20050317; 20050414; 20050519; 20050616; 20050714; 20050818; 20050915; 20051020; 20051117; 20051215];

for t=1:length(pexpDays)
    assert(isDayBeforeOptExpirationDay(pexpDays(t)));
    
    if (~isDayBeforeThirdFriday(tday2datenum(pexpDays(t))))
        fprintf(1, '%i\n', pexpDays(t));
    end
end